home *** CD-ROM | disk | FTP | other *** search
/ CD Charme 1 / CD Charme 01.iso / mac / hybride / GLOWING / HOLO / SHARED.DIR / 00310_Script_310 < prev    next >
Text File  |  1994-12-08  |  479b  |  15 lines
  1. on unsetQT channel
  2.   if the castNum of sprite 20 = 0 then exit
  3.   getQTname channel
  4.   -- getQTname returns the name of the QT movie
  5.   put the result into QTname
  6.   if QTname contains ".MOV" then
  7.     set the movieRate of sprite channel to 0
  8.     set the directToStage of cast QTname to FALSE
  9.     if the controller of cast QTname = TRUE then 
  10.       set the controller of cast QTname = FALSE
  11.     end if   
  12.     unL QTname
  13.   end if
  14.   puppetSprite channel, FALSE
  15. end unsetQT